Update language specific lists.
authoroliskoli <oliskoli>
Wed, 1 Nov 2006 20:22:21 +0000 (20:22 +0000)
committeroliskoli <oliskoli>
Wed, 1 Nov 2006 20:22:21 +0000 (20:22 +0000)
win32/gui-2/about.dfm
win32/gui-2/about.pas
win32/gui-2/select.pas

index 5e235e3c7ff4b25eb9fed9e95e33a5f18f1be543..3437553e2abe7e2e824e2abec44decce73ae2e8a 100644 (file)
Binary files a/win32/gui-2/about.dfm and b/win32/gui-2/about.dfm differ
index e8a8d2d0f15d6fe5824b9e37edded0410badac68..92efefd44b1ee3ff90d80e1d14a4676833306172 100644 (file)
@@ -1,7 +1,7 @@
 unit about;\r
 \r
 {\r
-    Copyright (C) 2005 Olaf Klein, o.b.klein@gpsbabel.org\r
+    Copyright (C) 2005,2006 Olaf Klein, o.b.klein@gpsbabel.org\r
 \r
     This program is free software; you can redistribute it and/or modify\r
     it under the terms of the GNU General Public License as published by\r
@@ -84,9 +84,9 @@ begin
   lbSFURL.Left := lbHint1.Left + lbHint1.Width + 4;\r
   lbTranslators.Caption := lbTranslators.Caption + ':';\r
 \r
-  lbxTranslators.Items.Add(_('German by Olaf Klein'));\r
-  lbxTranslators.Items.Add(_('French by Lilian Morinon'));\r
-\r
+  lbxTranslators.Items.Add(_('German') + ' ' +  _('by') + ' Olaf Klein');\r
+  lbxTranslators.Items.Add(_('French') + ' ' +  _('by') + ' Lilian Morinon');\r
+  lbxTranslators.Items.Add(_('Spanish') + ' ' + _('by') + ' Daniel Diaz');\r
 end;\r
 \r
 procedure TfrmAbout.lbURLMouseMove(Sender: TObject; Shift: TShiftState; X,\r
index b0bf0c20f0925c2583d80f9bff67093b63874dcd..43e166f72d480b0417f536230ee85f4c9d8a7b02 100644 (file)
@@ -78,10 +78,10 @@ begin
       s := Builtin.Strings[i];\r
       if (s = '') then Continue;\r
 \r
-      if (CompareText(s, 'de') = 0) then sx := 'German' else\r
-      if (CompareText(s, 'es') = 0) then sx := 'Spanish' else\r
-      if (CompareText(s, 'fr') = 0) then sx := 'French' else\r
-      if (CompareText(s, 'en') = 0) then sx := 'English' else\r
+      if (CompareText(s, 'de') = 0) then sx := _('German') else\r
+      if (CompareText(s, 'es') = 0) then sx := _('Spanish') else\r
+      if (CompareText(s, 'fr') = 0) then sx := _('French') else\r
+      if (CompareText(s, 'en') = 0) then sx := _('English') else\r
         sx := '???';\r
 \r
       sx := Format('%s - %s', [s, sx]);\r